\(\int x (-a-b x)^{-n} (a+b x)^n \, dx\) [822]

Optimal result

Integrand size = 21, antiderivative size = 26 \[ \int x (-a-b x)^{-n} (a+b x)^n \, dx=\frac {1}{2} x^2 (-a-b x)^{-n} (a+b x)^n \]

[Out]

1/2*x^2*(b*x+a)^n/((-b*x-a)^n)

Rubi [A] (verified)

Time = 0.00 (sec) , antiderivative size = 26, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.095, Rules used = {23, 30} \[ \int x (-a-b x)^{-n} (a+b x)^n \, dx=\frac {1}{2} x^2 (-a-b x)^{-n} (a+b x)^n \]

[In]

Int[(x*(a + b*x)^n)/(-a - b*x)^n,x]

[Out]

(x^2*(a + b*x)^n)/(2*(-a - b*x)^n)

Rule 23

Int[(u_.)*((a_) + (b_.)*(v_))^(m_)*((c_) + (d_.)*(v_))^(n_), x_Symbol] :> Dist[(a + b*v)^m/(c + d*v)^m, Int[u*
(c + d*v)^(m + n), x], x] /; FreeQ[{a, b, c, d, m, n}, x] && EqQ[b*c - a*d, 0] &&  !(IntegerQ[m] || IntegerQ[n
] || GtQ[b/d, 0])

Rule 30

Int[(x_)^(m_.), x_Symbol] :> Simp[x^(m + 1)/(m + 1), x] /; FreeQ[m, x] && NeQ[m, -1]

Rubi steps \begin{align*} \text {integral}& = \left ((-a-b x)^{-n} (a+b x)^n\right ) \int x \, dx \\ & = \frac {1}{2} x^2 (-a-b x)^{-n} (a+b x)^n \\ \end{align*}

Mathematica [A] (verified)

Time = 0.00 (sec) , antiderivative size = 26, normalized size of antiderivative = 1.00 \[ \int x (-a-b x)^{-n} (a+b x)^n \, dx=\frac {1}{2} x^2 (-a-b x)^{-n} (a+b x)^n \]

[In]

Integrate[(x*(a + b*x)^n)/(-a - b*x)^n,x]

[Out]

(x^2*(a + b*x)^n)/(2*(-a - b*x)^n)

Maple [A] (verified)

Time = 1.78 (sec) , antiderivative size = 25, normalized size of antiderivative = 0.96

method	result	size
gosper	\(\frac {x^{2} \left (b x +a \right )^{n} \left (-b x -a \right )^{-n}}{2}\)	\(25\)
parallelrisch	\(\frac {x^{2} \left (b x +a \right )^{n} \left (-b x -a \right )^{-n}}{2}\)	\(25\)
risch	\(\frac {x^{2} {\mathrm e}^{-i n \pi \left (\operatorname {csgn}\left (i \left (b x +a \right )\right )^{3}-\operatorname {csgn}\left (i \left (b x +a \right )\right )^{2}+1\right )}}{2}\)	\(38\)

[In]

int(x*(b*x+a)^n/((-b*x-a)^n),x,method=_RETURNVERBOSE)

[Out]

1/2*x^2*(b*x+a)^n/((-b*x-a)^n)

Fricas [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 0.22 (sec) , antiderivative size = 10, normalized size of antiderivative = 0.38 \[ \int x (-a-b x)^{-n} (a+b x)^n \, dx=\frac {1}{2} \, x^{2} e^{\left (i \, \pi n\right )} \]

[In]

integrate(x*(b*x+a)^n/((-b*x-a)^n),x, algorithm="fricas")

[Out]

1/2*x^2*e^(I*pi*n)

Sympy [A] (verification not implemented)

Time = 1.74 (sec) , antiderivative size = 19, normalized size of antiderivative = 0.73 \[ \int x (-a-b x)^{-n} (a+b x)^n \, dx=\frac {x^{2} \left (- a - b x\right )^{- n} \left (a + b x\right )^{n}}{2} \]

[In]

integrate(x*(b*x+a)**n/((-b*x-a)**n),x)

[Out]

x**2*(a + b*x)**n/(2*(-a - b*x)**n)

Maxima [A] (verification not implemented)

none

Time = 0.19 (sec) , antiderivative size = 8, normalized size of antiderivative = 0.31 \[ \int x (-a-b x)^{-n} (a+b x)^n \, dx=\frac {1}{2} \, \left (-1\right )^{n} x^{2} \]

[In]

integrate(x*(b*x+a)^n/((-b*x-a)^n),x, algorithm="maxima")

[Out]

1/2*(-1)^n*x^2

Giac [A] (verification not implemented)

none

Time = 0.28 (sec) , antiderivative size = 5, normalized size of antiderivative = 0.19 \[ \int x (-a-b x)^{-n} (a+b x)^n \, dx=\frac {1}{2} \, x^{2} \]

[In]

integrate(x*(b*x+a)^n/((-b*x-a)^n),x, algorithm="giac")

[Out]

1/2*x^2

Mupad [B] (verification not implemented)

Time = 1.02 (sec) , antiderivative size = 24, normalized size of antiderivative = 0.92 \[ \int x (-a-b x)^{-n} (a+b x)^n \, dx=\frac {x^2\,{\left (a+b\,x\right )}^n}{2\,{\left (-a-b\,x\right )}^n} \]

[In]

int((x*(a + b*x)^n)/(- a - b*x)^n,x)

[Out]

(x^2*(a + b*x)^n)/(2*(- a - b*x)^n)